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The purpose of lho CHUT fe&ture ip to facilitate) certain. typec of Ust 
raaa Lpulationa in £XSF IX. Thi& feature ifi & flyntittlc convenience, rat her 
than an extension of the BEmanticg of U.SP : It pctnlta the programmer to 
teot directly whether a piece of Het (Structure matches a certain patterp, at A 
if jo I to construct another g true cute utilising subs ftfprant c of the original 
otirueture vhich matched pare a of the given pattern-, 

XL'. Bn Match mi Ihtqn p Mt ft ira 

‘the O&flT feature CCn to iEpLoEanEed by progEjjr-reitlg Guo interpretive 
functions la LISP* 

match 1 pattern; workspace] 
and cr:fts 1 1 uc t I format | array! 

£he mjJltb, Intorpreter has two arguments t a pattern e£ the Gyp c described, 
bairns amJ s workspace which la the list which Lc to ts matched against the 
pattern* If the match fells, the value of the function in tfil, If it 
succeeds, the value la a ayehc i, i c array idiich gives the tegmental;Ion of the 
VDikopece rdiiyh allowed a catch. 

The pr mfltrugtj interpreter ua^ e: a to raE* to be described below, and an 
nil-ay which Is an output of a successful ndEch It constructs a new Sti’Lcture 
SCfQIlJtnt; to r.tlAJl ferret. 



jin*., gdrt ffj jti.a 

A p'ltt.*ra Is a Hat of eienenSEii'y piittejms,. £n the iourre languagej 
xfw ttS^r )" 1 ii of tile following forriEi 

( <*P> '-ep> .-■ <tJv ) 

s.-:.eh Js an elementary pattern.,. as described A ppcce 

dellmita c-Arli <ap> . In ■fraternal IIt appears as 

C E-A-iTSHN Cuff* ... ■&&■■■' ) 

yfreTE ik- ha<K used tt h fi 't to Indicate t ho tHSaaf&Vraflt ion of each fllcKHitiry 
Emi (,o itg intern repr4rant3$l on„ ftrt general J > will he used to 
iotlfenr.e the trjroafcnnfltlou to interusH lan^na^e sfl defioc'd For all of L'fSP 
HI a A patfe^o HiBtrTn^a « 3E#t it e-dcEi elementary pgttetti JMErhes j sflsrasrtt 
of tM-H HflEj. cbt TtSc^ed &CgjD<Jmt8, i-Q Order, constitute Lite 'Sfltiro I.is! . 
Xlte foil owing 4it* the a i, »tn.t*ry patlemi: 

1} Sowrc.c Lansmgas 4 

i fttrt me L Lunging# ■ { Mil > 

It) Lfl hE.II rr^t'C li WjUmrinE cf the workspace, iiicVydtn^ 0 null 

se.gmar-t-i if the rcat of th« pattern x^tehes the remainder of tE;e workspace< 
^he ei»il lest posjMbl# gegment which allows tfttf match ±& found A The One 
(‘Kcoption to this rul# Is that $ m a latt element of a pattern will Lcaich 
tiso remainder of th« worfc&ptca* 

z) Source Igti^ih: gpr; $ <"IneogGr> e. + g^ $1, $3, 

Internal Language e £D 0 LH (£GLM 1 ), (cou-J 2 )» 

?or any integfiT 11* £n matches n cooeeeotlvf elemOi-fcO of the i.JOTispa'’:®, 
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Source Languor? e.g. 'fiCfif, f 4, ‘TftE '#-AB+£ 

Internal Laagpdjjo : <'e- L fcKp> ) 

■A quoted 3 -expression mat,dies an identical eLe;;seifiE: in file wor 1 E.Dp 5 .Gc. 

A) Source Lan^crnse 1 <tf4ri^ble^ e*g. A, ALPHA £4) 
internal Len^inge a tabled 

A variable efift-ches an item, in the? workspace ■which ia a^ual Co the 
value of the variable. 

5) Source Language 2 ^palternb 

Internal Language i <pa£tem>^ 

A pattern nntchss an item in the workppat b cjhich it a lict* and 
c-h?c!t mritclios the pat to art in the sense defined here, if n amt eh is found 
the Array for thia :saCch is placed in the appropriate poottt.cn of the array 
for the total catch. 

5) Source longueae 2 ^/<prcd-atoa^- 

internal Language; (LOLP <pred“atoaii - ? *) 

Khtchou anything that j ms Echey, with the additional condition 
tlwt the J3e£p-ent found cunt also onfUiy the predicate of one variable 
nanad by the atora <pi:ed-a£c^ . 

7) Source Language;. S/(<pred>) 

^'eternal Language? (DOIf 

Exactly !rho sag* ac a Love except that <pted> is any non^atoicic 


prod.S cate of one variable * 
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Sj flonre-e ^pted-atota > d .- $u/< <pi:ad>) 

|tt£(!T7Bal Lflftgu.ise: (DOLNP n <pn^d' 0 L« 1 > *) or (DOW n <prGcI>rt) 

£fl above ■ but matches A segment of n lte^o which acCinfiGa Che 
pltdicale of one variable utnic'l < pired’Btoni> or <|>red"? . 

9) Scnrrce Language? n nr n$rn$p ft,fc + 4 or L$2$4 j 1 1n * f V->r L - lf j“ r> 

Internal Language - (ABHACtf (AHHAlR. u# utf pftj 

An integer □ refers to the contents of the nth ele^r-t of Cha 
a tray for thia match. It awtehea an Its m In t;he workspace Identical to 
this element ip. the atray, 1$2 would refer to the second item id ths artsy 
Btored ct the firat array [>oottlon. This type of^ep> is called na array 
rnflirh or <br'irjTli>- 

id) Semre Language: .^//t<n-pred^ <p-jr£y ,C ' l ) 

Internal tapgoagei (POtiF <Vl-pE&d>'V <p j arg> £ n ’ 

Matches anything retched by $ with Che dddiciftaril condition thet th# 
cegiamt notched satisfies the predicate of q-£?gUttent tf ttfliced by ^ptca?' . Ihe 
first argument of <n“pred> is linplicitly the list etched by thr $, The 
other n-l stguanoilts are all <p'*argVE. A <p-arj|> esa be mi ^atmnrO , a 
<v£riablc^ or -ft 1 ^S“Ca;p>> . They refdvcmce previously OflEcbed items , 
variable# a.id co^atents. 

H> SoUtcu Ldngumgs; $n//( ^n*pred > <ii~a-g} n S 
jfniSfnal Lcil junga ; (DC111]I 1 n~ <fn-pped’^ -c r%y 

Sna;e as ehoue biit pi^tcb^S 4 sellout of n oOnaficutlve lEeinfi in the 
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worbepace* Similarly* ua mill nliou: 


12) Soui'C-2 language; 
Internal language; 


variable //( ^fl-prad^ <'p-arg> n " i ) 

OfjlaF <variables * <u* pirs{ j> > <n-afg> #"* l j 


13) Source Language : 
Internal Language: 


<a r*a rl.s> // ( -prad> -ar &> n ' 1 ) 

(ARF <iai!Kiark>& *$s-pred>tf ^-aig 


14 ) Source longues*; 5 S/<c-fi^> 

Internal Language: (notA <c-^fen> ■;>) 

TjiIb Is flu eaenpe mechiininm to allow the usar to eonatruct litt owe 
n at thing function, The is S function of A u rgutfiOPta „ A* N* W aed 

fH# At run time this function trfll be given an array A„ e number W which 
represent» tin Prietos of the ^p> , to, in the pattern* a Hat ti which 
is the wartaaacc that the <£~fcn> chould try to match, and a functional 
Argument ra which Should he used to inatch the r**c Of the wrkapaqe beyond 
the pclnt Liatched by the <&-fcri> , If fh Eu=eeeda # and <£-£uVraatchaa, 

should insert the segment ft aa tclieo into eh& stray at poaitiaa it 
end return the array* If pot <Jb*-fen> qhuuld return NI.L, 

Anci .^nciertfc to var.-flu)os of matching ECjjissita e£ the worklEKLM cqp 
bo done Automatically with in s pattern for <hf>> T s $, $1 T and $$ in all 
their forms, This is dene by preceding the by the variable, uith nr 

apace between the variable shcJ the following In internal language this is 



represent ed by 


(SET < variah 1 d> * jfmark> a) 

WIianoOflaE^ifi the fom of £l , ot $$ felLcring Efre variable n^ice. 

jy* _Iftjnr afcrt 

A fonait 1 b a Hat of eierreniary formate <ef > , Iu source language 
it appears as 

C<ef> <cf> <ajf> J 

where succccslve <tf> *a ere separated by apaceo, In imenml lAastisge 
it appears as 

{FomAx 

Hie list denoted by cecb is concatenated into Eh® Kct daunted by the 

f onset. If the <aO denotes efl atCmi then this atom it eons-sd Into the 
list. T"iC cleatucKaty formats are; 

1) Source language: 1 dTe-exp> «Hg. 3 A r (A 1) 

Internal Language i (QUOTE > 

The quoted io concatenated or cens-ed its as described above 

This implies that ’A end '(A> will be treated identically< 

L) Sflurte Language; <variablfl^ 

IntClftSl Language: <udr table'?'™ 

Xhe valoa cf the variable is inserted in the reconetrueted iiafc* 

3) Source Lju^gnasei <aBamrt:> <■„£. 5 , 4$;? 

Internal Language: <stsmirk> * c.g. (AKtfAK£ 3) (AI04UR i 2) 
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%hc element of. the avr3y at the position given by the ^ii;mar3:> Is 
inserted Into the reconotruoted Hot, If the j£--ttcflrk> Gpe-difrea a position 
in tfijch there it an at re 7 , the element□ of tlifj arraj are concatenated, and 
this new list Inserted in the reconstruction * 

4J Eource Language? ■<" format*/ 
internal Lnnfiueae 2 <f orsiat^ * 

A ^fo3raet> can be inserted 33 an. <e£> within a * The 

result of recnnatructlns with this Inner itoastat#' and the original array 
is conoid luto the hlaher level list* thus? aLTotfittif cmia tract ion of 
STldttfltily ccsKples list structures, 

#) Source iBiLgiiige;: fn( <p-ars.> ,,£p~.STp h >J 

TnCetral LanguageJ (70EH1 fo^ ^Jp-*arg> * .,,, ^p'-sr^ -) 

lhi.5 allow the inaeTtlon Into the recoupLrection it& & List 

thlch is an arbitrary function of the notched flub«£mcaecj arid other variables ? 
and c (mutants- 


i. - ^ Tirana iah ot. Fo sr a nd ca tst-met 

Suppose wa rzq given any function of two variablea I Eu*vl for which 
we fir a value & for a. It ts now effectively a function of one variable. We 
can define a function. Jf* {v! which utilize a this ■constant In Its definition. 
When f ®ud £* [v] ore cal led , the latter will tun mote efficiently. 


Ijuth Ek jtch and con struct ire functions of the type disecreed above. 
The pftttmu fax iflatcft . And tlie format for cons truct are of tan known ct 
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CGiunile time. In LISP If we will coqpiIt calls to match and construct 
which have cone taut patterns and formats, respectively p by first translating 
theia into LISP tunc Liana of one variable* I have wrist on a preliminary 
version of this translator f o r_ n.ii C rh. 

Vj. ■ _The CCt lfT StaLera^nt 

The COiSST statcr-ent in LIS? IT will provide a convenient way to call 
fl ftteh and construct illicitly, In source Iflrtgtil gc , the fotri of the «oct 
general CWLf statement will has 

O0MXV W, , A i . *D-<&.--<fo]rmaf> fl{|, ), »<n 2 > 

in internal language this would he represented os 

(CGMTT V, ({V <pflttem> *f> {A <fq oust >+>,,. <0 <fon,iatl?*) > 1 t 1 2 J 

H is a locative expression for e list which will be the workopacc 
for the pattern match, U is an array narae which will he assigned the value 
of the Hatch if it Succeeds. An implicit call la wide to ntdtch with tbo 
pattern and B <! S -Srgumffl tS * A, E ; ... j are locative expressions which ire 
assigned valuta according to their respective formats tf the catch is 
successful + If the match Is successful * after asci gruBsat a to A* , ...D 
control goes *0 ths Statement Inhaled {Indicated by If the ratch 

fails* a transfer is made to 9^ (indicated by F(4j)). 

Many elements Or this Ststeoent Sro optional. If l| U‘3- <l ia omit tel , 
s local !ier,iy Is created but not named. if "A*- 1 ' {the first locative 
expression with S format)' is omitted, it Ls dflSujriCd to he W. Ho other fornate 
Tveod appear. B(JBj) acd/or F(Jmay be cuifted; tvaaffct will be made Ho- 
the ncKt stateaient for cn omitted condition lobe!* if either fl(^) ot F(^) 
are miaclTg, they appear in internal language as foil. 



